home *** CD-ROM | disk | FTP | other *** search
/ Software Vault: The Gold Collection / Software Vault - The Gold Collection (American Databankers) (1993).ISO / cdr47 / wasm223.zip / VIDEO8.ASM < prev    next >
Assembly Source File  |  1993-05-04  |  935b  |  39 lines
  1. ;*******************************;
  2. ; WASM Video Module, Color Flag ;
  3. ; By Eric Tauck                 ;
  4. ;                               ;
  5. ; Defines:                      ;
  6. ;                               ;
  7. ;   VidCol  determine if color  ;
  8. ;                               ;
  9. ; Requires:                     ;
  10. ;                               ;
  11. ;   VIDEO2.ASM                  ;
  12. ;*******************************;
  13.  
  14.         jmps    _video8_end
  15.  
  16. ;========================================
  17. ; Check if the current adapter supports
  18. ; color.
  19. ;
  20. ; Out: CY= set if color.
  21.  
  22. VidCol  PROC    NEAR
  23.         call    VidTyp          ;get adapter type
  24.         cmp     al, CGACOL
  25.         je      _vdcol1
  26.         cmp     al, EGACOL
  27.         je      _vdcol1
  28.         cmp     al, VGACOL
  29.         je      _vdcol1
  30.         cmp     al, MCGACOL
  31.         je      _vdcol1
  32.         stc
  33. _vdcol1 cmc
  34.         ret
  35.         ENDP
  36.  
  37. _video8_end
  38.  
  39.